home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 1999 September / DPPCPRO0999.ISO / Macromed / Flash2 / CD Extras / WebTools / JBS.DXR / 00117_popDown.ls < prev    next >
Encoding:
Text File  |  1997-04-13  |  500 b   |  21 lines
  1. on mouseUp
  2.   set R to the rect of window "JBS"
  3.   set hi to the bottom of R - the top of R
  4.   if hi < 406 then
  5.     set the bottom of R to the top of R + 425
  6.     set the rect of window "JBS" to R
  7.     set c to the number of cast "popUp"
  8.     if c > 0 then
  9.       set the puppet of sprite clickOn() to 1
  10.       set the castNum of sprite clickOn() to c
  11.       updateStage()
  12.     else
  13.       alert("Missing cast 'popUp' !")
  14.     end if
  15.   end if
  16. end
  17.  
  18. on myHelp
  19.   return "Click to display the help box messages"
  20. end
  21.